integer
integer
local
local
local
FirstOfGroup
set
loop
exitwhen
set
GetItemCharges
set
loop
exitwhen
set
GetItemTypeId
GetItemCharges
RemoveItem
endif
set
endloop
endif
set
endloop
null
null
null
